﻿Imports System.Collections.Generic
Imports System.Linq
Imports System.Text
Imports System.Windows
Imports System.Windows.Controls
Imports System.Windows.Data
Imports System.Windows.Documents
Imports System.Windows.Input
Imports System.Windows.Media
Imports System.Windows.Media.Imaging
Imports System.Windows.Shapes

''' <summary>
''' Interaction logic for StartWindow.xaml
''' </summary>
Partial Public Class StartWindow
    Inherits Window

    'Public Shared main As Object

    Public Sub New()
        Me.Cursor = Cursors.Wait
        InitializeComponent()
        Me.Cursor = Cursors.Arrow

    End Sub

    Private Sub Storyboard_Completed(ByVal sender As Object, ByVal e As EventArgs)
        Me.Cursor = Cursors.Wait
        Dim objLoginWindow As New LoginWindow()
        objLoginWindow.ShowDialog()
        objLoginWindow = Nothing
        'MainWindow objMainWindow = new MainWindow();
        'objMainWindow.ShowDialog();
        'objMainWindow = null;
        Me.Close()
        Me.Dispatcher.InvokeShutdown()
        Me.Cursor = Cursors.Arrow
    End Sub

    'Shared Sub initApps(ByVal _main As Object)
    '    main = _main
    'End Sub

    'Public Shared Function getMainApps() As Object       
    '    Return main
    'End Function
End Class
